﻿Public Class DesgloseBE
    Dim iKvje As Integer
    Dim iKBle As Integer
    Dim iKBld As Integer
    Dim sNume As String
    Dim sBLHijo As String
    Dim sConsig As String
    Dim sConten As String
    Dim dPeso As Double
    Dim sObse As String
    Dim sUsu As String
    Dim sEstado As String
    Dim sTOPE As String
    Dim sPtoo As String
    Dim iFlag As Integer

    Public Property BLHijo() As String
        Get
            Return sBLHijo
        End Get
        Set(ByVal value As String)
            sBLHijo = value
        End Set
    End Property


    Public Property Estado() As String
        Get
            Return sEstado
        End Get
        Set(ByVal value As String)
            sEstado = value
        End Set
    End Property

    Public Property TOPE() As String
        Get
            Return sTOPE
        End Get
        Set(ByVal value As String)
            sTOPE = value
        End Set
    End Property

     
    Public Property Kvje() As Integer
        Get
            Return iKvje
        End Get
        Set(ByVal value As Integer)
            iKvje = value
        End Set
    End Property

    Public Property KBle() As Integer
        Get
            Return iKBle
        End Get
        Set(ByVal value As Integer)
            iKBle = value
        End Set
    End Property

    Public Property KBld() As Integer
        Get
            Return iKBld
        End Get
        Set(ByVal value As Integer)
            iKBld = value
        End Set
    End Property

    Public Property Nume() As String
        Get
            Return sNume
        End Get
        Set(ByVal value As String)
            sNume = value
        End Set
    End Property

    Public Property Consig() As String
        Get
            Return sConsig
        End Get
        Set(ByVal value As String)
            sConsig = value
        End Set
    End Property

    Public Property Conten() As String
        Get
            Return sConten
        End Get
        Set(ByVal value As String)
            sConten = value
        End Set
    End Property

    Public Property Peso() As Double
        Get
            Return dPeso
        End Get
        Set(ByVal value As Double)
            dPeso = value
        End Set
    End Property

    Public Property Obse() As String
        Get
            Return sObse
        End Get
        Set(ByVal value As String)
            sObse = value
        End Set
    End Property

    Public Property Usu() As String
        Get
            Return sUsu
        End Get
        Set(ByVal value As String)
            sUsu = value
        End Set
    End Property

    Public Property Ptoo() As String
        Get
            Return sPtoo
        End Get
        Set(ByVal value As String)
            sPtoo = value
        End Set
    End Property

    Public Property Flag() As Integer
        Get
            Return iFlag
        End Get
        Set(ByVal value As Integer)
            iFlag = value
        End Set
    End Property
  
End Class
